package component.kindeditor.util;

import java.io.File;
import java.io.IOException;
import java.io.PrintWriter;
import java.text.SimpleDateFormat;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collections;
import java.util.Date;
import java.util.Hashtable;
import java.util.Iterator;
import java.util.List;
import java.util.Properties;
import java.util.Random;

import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.apache.commons.lang.StringUtils;
import org.json.simple.JSONObject;

import component.kindeditor.NameComparator;
import component.kindeditor.SizeComparator;
import component.kindeditor.TypeComparator;

public class KindeditorUtil {
	public static String IMGSAVEPATH;
	public static String IMGSAVEURL; 
	public static long FILE_MAX_SIZE  = 1000000;
	static{
		Properties pros = new Properties();
		try {
			pros.load(KindeditorUtil.class.getResourceAsStream("/kindeditor.properties"));
		} catch (IOException e) {
			e.printStackTrace();
		}
		IMGSAVEURL = pros.getProperty("imageUrl");
		IMGSAVEPATH = pros.getProperty("imageSavePath");
	}
	
	public static void fileUpload(HttpServletRequest request,HttpServletResponse response) throws Exception{
		PrintWriter out = response.getWriter();
		JSONObject obj = new JSONObject();
		try {
			String savePath = KindeditorUtil.IMGSAVEPATH;
			//文件保存目录URL
			String saveUrl  = KindeditorUtil.IMGSAVEURL;
			String domain  = request.getParameter("domain");
			if(StringUtils.isNotEmpty(domain)){
				savePath = KindeditorUtil.IMGSAVEPATH + domain + "/";
				saveUrl  = KindeditorUtil.IMGSAVEURL + domain + "/";
			}
			
			//定义允许上传的文件扩展名
			String[] fileTypes = new String[]{"gif", "jpg", "jpeg", "png", "bmp"};
			
			//最大文件大小
			long maxSize = KindeditorUtil.FILE_MAX_SIZE;

			response.setContentType("text/html; charset=UTF-8");
			if(!ServletFileUpload.isMultipartContent(request)){
				out.println(getError("&quot;请选择文件。&quot;"));
				return;
			}
			
			//检查目录
			File uploadDir = new File(savePath);
			if(!uploadDir.isDirectory()){
				out.println(getError("&quot;上传目录不存在。&quot;"));
				return;
			}
			//检查目录写权限
			if(!uploadDir.canWrite()){
				out.println(getError("&quot;上传目录没有写权限。&quot;"));
				return;
			}
			
			//创建文件夹
			SimpleDateFormat sdf = new SimpleDateFormat("yyyyMMdd");
			String ymd = sdf.format(new Date());
			savePath += ymd + "/";
			saveUrl += ymd + "/";
			File dirFile = new File(savePath);
			if (!dirFile.exists()) {
				dirFile.mkdirs();
			}

			FileItemFactory factory = new DiskFileItemFactory();
			ServletFileUpload upload = new ServletFileUpload(factory);
			upload.setHeaderEncoding("UTF-8");
			String pathInfo = request.getPathInfo();
			//tomcat根目录下需要有temp文件夹,不然会出现文件找不到的错误
			List items = upload.parseRequest(request);
			Iterator itr = items.iterator();
			while (itr.hasNext()) {
				FileItem item = (FileItem) itr.next();
				String fileName = item.getName();
				long fileSize = item.getSize();
				if (!item.isFormField()) {
					//检查文件大小
					if(item.getSize() > maxSize){
						out.println(getError("&quot;上传文件大小超过限制。&quot;"));
						return;
					}
					//检查扩展名
					String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
					if(!Arrays.asList(fileTypes).contains(fileExt)){
						out.println(getError("&quot;上传文件扩展名是不允许的扩展名。&quot;"));
						return;
					}

					SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");
					String newFileName = df.format(new Date()) + "_" + new Random().nextInt(1000) + "." + fileExt;
					try{
						File uploadedFile = new File(savePath, newFileName);
						item.write(uploadedFile);
					}catch(Exception e){
						out.println(getError("&quot;上传文件失败。&quot;"));
						return;
					}
					obj.put("error", new Integer(0));
					obj.put("url", saveUrl + newFileName);
					out.println(obj.toJSONString());
				}
			}
		} catch (Exception e) {
			out.println(getError("&quot;上传文件失败。&quot;"));
		}finally{
			out.flush();
			out.close();
		}
		
	}
	
	private static String getError(String message) {
		JSONObject obj = new JSONObject();
		obj.put("error", new Integer(1));
		obj.put("message", message);
		return obj.toJSONString();
	}
	
	public static void fileManager(HttpServletRequest request,
			HttpServletResponse response) throws Exception {
		PrintWriter out = response.getWriter();

		// 根目录路径，可以指定绝对路径，比如 /var/www/attached/
		String rootPath = KindeditorUtil.IMGSAVEPATH;

		// 根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/
		String rootUrl = KindeditorUtil.IMGSAVEURL;

		// 图片扩展名
		String[] fileTypes = new String[] { "gif", "jpg", "jpeg", "png", "bmp" };

		// 根据path参数，设置各路径和URL
		String path = request.getParameter("path") != null ? request
				.getParameter("path") : "";
		String currentPath = rootPath + path;
		String currentUrl = rootUrl + path;
		String currentDirPath = path;
		String moveupDirPath = "";
		if (!"".equals(path)) {
			String str = currentDirPath.substring(0,
					currentDirPath.length() - 1);
			moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0,
					str.lastIndexOf("/") + 1) : "";
		}

		// 排序形式，name or size or type
		String order = request.getParameter("order") != null ? request
				.getParameter("order").toLowerCase() : "name";

		// 不允许使用..移动到上一级目录
		if (path.indexOf("..") >= 0) {
			out.println("Access is not allowed.");
			return;
		}
		// 最后一个字符不是/
		if (!"".equals(path) && !path.endsWith("/")) {
			out.println("Parameter is not valid.");
			return;
		}
		// 目录不存在或不是目录
		File currentPathFile = new File(currentPath);
		if (!currentPathFile.isDirectory()) {
			out.println("Directory does not exist.");
			return;
		}

		// 遍历目录取的文件信息
		List<Hashtable> fileList = new ArrayList<Hashtable>();
		if (currentPathFile.listFiles() != null) {
			for (File file : currentPathFile.listFiles()) {
				Hashtable<String, Object> hash = new Hashtable<String, Object>();
				String fileName = file.getName();
				if (file.isDirectory()) {
					hash.put("is_dir", true);
					hash.put("has_file", (file.listFiles() != null));
					hash.put("filesize", 0L);
					hash.put("is_photo", false);
					hash.put("filetype", "");
				} else if (file.isFile()) {
					String fileExt = fileName.substring(
							fileName.lastIndexOf(".") + 1).toLowerCase();
					hash.put("is_dir", false);
					hash.put("has_file", false);
					hash.put("filesize", file.length());
					hash.put("is_photo", Arrays.<String> asList(fileTypes)
							.contains(fileExt));
					hash.put("filetype", fileExt);
				}
				hash.put("filename", fileName);
				hash.put("datetime",
						new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file
								.lastModified()));
				fileList.add(hash);
			}
		}

		if ("size".equals(order)) {
			Collections.sort(fileList, new SizeComparator());
		} else if ("type".equals(order)) {
			Collections.sort(fileList, new TypeComparator());
		} else {
			Collections.sort(fileList, new NameComparator());
		}
		JSONObject result = new JSONObject();
		result.put("moveup_dir_path", moveupDirPath);
		result.put("current_dir_path", currentDirPath);
		result.put("current_url", currentUrl);
		result.put("total_count", fileList.size());
		result.put("file_list", fileList);

		response.setContentType("application/json; charset=UTF-8");
		out.println(result.toJSONString());
	}

}
